% A colormap that spans from deep blue to white
function f = spectrum(row)

f = [0,0,0;
0,0,0.0585;
0,0,0.1170;
0,0,0.1755;
0,0,0.2340;
0,0,0.2925;
0,0,0.3510;
0.0014,0.0070,0.3500;
0.0027,0.0141,0.3489;
0.0041,0.0211,0.3479;
0.0055,0.0282,0.3469;
0.0068,0.0352,0.3459;
0.0082,0.0423,0.3448;
0.0096,0.0493,0.3438;
0.0109,0.0564,0.3428;
0.0123,0.0634,0.3417;
0.0137,0.0705,0.3407;
0.0150,0.0775,0.3397;
0.0164,0.0846,0.3386;
0.0178,0.0916,0.3376;
0.0191,0.0987,0.3366;
0.0205,0.1057,0.3356;
0.0219,0.1128,0.3345;
0.0232,0.1198,0.3335;
0.0246,0.1269,0.3325;
0.0260,0.1339,0.3314;
0.0273,0.1410,0.3304;
0.0287,0.1480,0.3294;
0.0301,0.1551,0.3284;
0.0314,0.1621,0.3273;
0.0328,0.1691,0.3263;
0.0342,0.1762,0.3253;
0.0355,0.1832,0.3242;
0.0369,0.1903,0.3232;
0.0383,0.1973,0.3222;
0.0396,0.2044,0.3211;
0.0410,0.2114,0.3201;
0.0424,0.2185,0.3191;
0.0437,0.2255,0.3181;
0.0451,0.2326,0.3170;
0.0465,0.2396,0.3160;
0.0470,0.2426,0.3082;
0.0476,0.2455,0.3004;
0.0482,0.2484,0.2925;
0.0488,0.2514,0.2847;
0.0494,0.2543,0.2769;
0.0500,0.2572,0.2691;
0.0506,0.2601,0.2613;
0.0511,0.2631,0.2535;
0.0517,0.2660,0.2456;
0.0523,0.2689,0.2378;
0.0529,0.2719,0.2300;
0.0535,0.2748,0.2222;
0.0541,0.2777,0.2144;
0.0547,0.2807,0.2066;
0.0553,0.2836,0.1987;
0.0558,0.2865,0.1909;
0.0564,0.2895,0.1831;
0.0570,0.2924,0.1753;
0.0576,0.2953,0.1675;
0.0582,0.2982,0.1597;
0.0588,0.3012,0.1518;
0.0594,0.3041,0.1440;
0.0600,0.3070,0.1362;
0.0605,0.3100,0.1284;
0.0611,0.3129,0.1206;
0.0617,0.3158,0.1128;
0.0623,0.3188,0.1049;
0.0629,0.3217,0.0971;
0.0635,0.3246,0.0893;
0.0641,0.3276,0.0815;
0.0647,0.3305,0.0737;
0.0652,0.3334,0.0659;
0.0658,0.3363,0.0580;
0.0664,0.3393,0.0502;
0.0670,0.3422,0.0424;
0.0676,0.3451,0.0346;
0.0682,0.3481,0.0268;
0.0688,0.3510,0.0190;
0.0829,0.3589,0.0198;
0.0971,0.3669,0.0207;
0.1113,0.3748,0.0215;
0.1254,0.3827,0.0224;
0.1396,0.3907,0.0232;
0.1538,0.3986,0.0241;
0.1679,0.4065,0.0250;
0.1821,0.4144,0.0258;
0.1963,0.4224,0.0267;
0.2104,0.4303,0.0275;
0.2246,0.4382,0.0284;
0.2388,0.4462,0.0293;
0.2529,0.4541,0.0301;
0.2671,0.4620,0.0310;
0.2813,0.4700,0.0318;
0.2955,0.4779,0.0327;
0.3096,0.4858,0.0336;
0.3238,0.4938,0.0344;
0.3380,0.5017,0.0353;
0.3521,0.5096,0.0361;
0.3663,0.5175,0.0370;
0.3805,0.5255,0.0378;
0.3946,0.5334,0.0387;
0.4088,0.5413,0.0396;
0.4230,0.5493,0.0404;
0.4371,0.5572,0.0413;
0.4513,0.5651,0.0421;
0.4655,0.5731,0.0430;
0.4796,0.5810,0.0439;
0.4938,0.5889,0.0447;
0.5080,0.5968,0.0456;
0.5221,0.6048,0.0464;
0.5363,0.6127,0.0473;
0.5505,0.6206,0.0482;
0.5646,0.6286,0.0490;
0.5788,0.6365,0.0499;
0.5930,0.6444,0.0507;
0.6072,0.6524,0.0516;
0.6213,0.6603,0.0525;
0.6355,0.6682,0.0533;
0.6497,0.6762,0.0542;
0.6638,0.6841,0.0550;
0.6780,0.6920,0.0559;
0.6922,0.6999,0.0567;
0.7063,0.7079,0.0576;
0.7205,0.7158,0.0585;
0.7347,0.7237,0.0593;
0.7488,0.7317,0.0602;
0.7630,0.7396,0.0610;
0.7679,0.7361,0.0627;
0.7729,0.7326,0.0644;
0.7778,0.7290,0.0660;
0.7828,0.7255,0.0677;
0.7877,0.7220,0.0694;
0.7926,0.7185,0.0710;
0.7976,0.7149,0.0727;
0.8025,0.7114,0.0744;
0.8074,0.7079,0.0760;
0.8124,0.7044,0.0777;
0.8173,0.7008,0.0794;
0.8223,0.6973,0.0810;
0.8272,0.6938,0.0827;
0.8321,0.6903,0.0844;
0.8371,0.6868,0.0860;
0.8420,0.6832,0.0877;
0.8469,0.6797,0.0894;
0.8519,0.6762,0.0910;
0.8568,0.6727,0.0927;
0.8618,0.6691,0.0944;
0.8667,0.6656,0.0960;
0.8716,0.6621,0.0977;
0.8766,0.6586,0.0994;
0.8815,0.6551,0.1010;
0.8864,0.6515,0.1027;
0.8914,0.6480,0.1044;
0.8963,0.6445,0.1060;
0.9013,0.6410,0.1077;
0.9062,0.6374,0.1093;
0.9111,0.6339,0.1110;
0.9161,0.6304,0.1127;
0.9210,0.6269,0.1143;
0.9259,0.6233,0.1160;
0.9309,0.6198,0.1177;
0.9358,0.6163,0.1193;
0.9408,0.6128,0.1210;
0.9457,0.6093,0.1227;
0.9506,0.6057,0.1243;
0.9556,0.6022,0.1260;
0.9605,0.5987,0.1277;
0.9654,0.5952,0.1293;
0.9704,0.5916,0.1310;
0.9753,0.5881,0.1327;
0.9803,0.5846,0.1343;
0.9852,0.5811,0.1360;
0.9901,0.5775,0.1377;
0.9951,0.5740,0.1393;
1,0.5705,0.1410;
1,0.5637,0.1400;
1,0.5570,0.1391;
1,0.5502,0.1381;
1,0.5434,0.1372;
1,0.5367,0.1362;
1,0.5299,0.1352;
1,0.5232,0.1343;
1,0.5164,0.1333;
1,0.5096,0.1324;
1,0.5029,0.1314;
1,0.4961,0.1304;
1,0.4893,0.1295;
1,0.4826,0.1285;
1,0.4758,0.1276;
1,0.4690,0.1266;
1,0.4623,0.1256;
1,0.4555,0.1247;
1,0.4488,0.1237;
1,0.4420,0.1228;
1,0.4352,0.1218;
1,0.4285,0.1209;
1,0.4217,0.1199;
1,0.4149,0.1189;
1,0.4082,0.1180;
1,0.4014,0.1170;
1,0.3946,0.1161;
1,0.3879,0.1151;
1,0.3811,0.1141;
1,0.3744,0.1132;
1,0.3676,0.1122;
1,0.3608,0.1113;
1,0.3541,0.1103;
1,0.3473,0.1093;
1,0.3405,0.1084;
1,0.3338,0.1074;
1,0.3270,0.1065;
1,0.3203,0.1055;
1,0.3135,0.1045;
1,0.3067,0.1036;
1,0.3000,0.1026;
1,0.2932,0.1017;
1,0.2864,0.1007;
1,0.2797,0.0997;
1,0.2729,0.0988;
1,0.2661,0.0978;
1,0.2594,0.0969;
1,0.2526,0.0959;
1,0.2459,0.0949;
1,0.2391,0.0940;
1,0.2323,0.0930;
1,0.2256,0.0921;
1,0.2188,0.0911;
1,0.2120,0.0901;
1,0.2053,0.0892;
1,0.1985,0.0882;
1,0.1917,0.0873;
1,0.1850,0.0863;
1,0.1782,0.0854;
1,0.1715,0.0844;
1,0.1647,0.0834;
1,0.1579,0.0825;
1,0.1512,0.0815;
1,0.1444,0.0806;
1,0.1376,0.0796;
1,0.1309,0.0786;
1,0.1241,0.0777;
1,0.1173,0.0767;
1,0.1106,0.0758;
1,0.1038,0.0748;
1,0.0971,0.0738;
1,0.0903,0.0729;
1,0.0835,0.0719;
1,0.0768,0.0710;
1,0.0700,0.0700;
1,0.2250,0.2250;
1,0.3800,0.3800;
1,0.5350,0.5350;
1,0.6900,0.6900;
1,0.8450,0.8450;
1,1,1];

if( nargin==1 )
  f=f(row,:);
end

end

